home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / util / dtype / SoundDT41.lha / SoundDT41 / Install < prev    next >
Text File  |  1999-01-27  |  3KB  |  109 lines
  1. ; $VER: Installer script for SoundDT 1.3 (27.01.99) © 1998/99 by Stephan Rupprecht
  2.  
  3. (set @default-dest "SYS:classes/datatypes")
  4.  
  5. ;--- localize strings ----
  6. (if (= @language "deutsch")
  7. (
  8.     (set #wrongver "SoundDT benötigt mindestens AmigaOS3.0.\nInstallation kann nicht durchgeführt werden.")
  9.     (set #backup "Soll der alte sound.datatype gesichert werden?")
  10.     (set #backup_help "Wenn Sie 'Ja' selektieren, so wird der alte sound.datatype unter 'sound.datatype.bak' gesichert.");
  11.     (set #found_8svx "Der '8svx.datatype' ist auf Ihrem System installiert.\nDieser wird nun durch den neuen 'svx.datatype' ersetzt.\nDie Deskriptordatei für 8svx wird in das 'Storage'\nVerzeichnis Ihrer Systempartition bewegt.")
  12.     (set #found_16sv "Der '16sv.datatype' ist auf Ihrem System installiert.\nDieser wird nun durch den neuen 'svx.datatype' ersetzt.\nDie Deskriptordatei für 16sv wird in das 'Storage'\nVerzeichnis Ihrer Systempartition bewegt.")
  13.     (set #prefsdrwr "Bitte wählen Sie das Zielverzeichnis\nfür den SoundDT41 Prefseditor")
  14.     (set #endmsg "Sie sollten nun Ihren Rechner neu starten!")
  15. )
  16. (
  17.     (set #wrongver "SoundDT requires at least AmigaOS3.0\nInstallation aborted.")
  18.     (set #backup "Do you wish to backup the old sound.datatype?")
  19.     (set #backup_help "If you select 'Yes', the old sound.datatype will be renamed as sound.datatype.bak.")
  20.     (set #found_8svx "You've '8svx.datatype' installed.\nThis datatype will now be replaced by the new 'svx.datatype'.\nThe descriptor-file for 8svx will be moved to\nthe 'Storage' drawer of your SYS: partition.")
  21.     (set #found_16sv "You've '16sv.datatype' installed.\nThis datatype will now be replaced by the new 'svx.datatype'.\nThe descriptor-file for 16sv will be moved to\nthe 'Storage' drawer of your SYS: partition.")
  22.     (set #prefsdrwr "Please choose the destination drawer\nfor the preferences editor")
  23.     (set #endmsg "To make the changes active you need to restart your computer!");
  24. )
  25. )
  26.  
  27. ;--- check os version ---
  28. (set #vernum (getversion "exec.library" (resident)))
  29. (set #vernum (/ #vernum 65536))
  30.  
  31. (if(< #vernum 39)
  32.     (abort #wrongver)
  33. )
  34.  
  35. ;--- lets rock ---
  36. (set #choice
  37.     (askbool 
  38.         (prompt #backup)
  39.         (help    #backup_help)
  40.         (default 1)
  41.     )
  42. )
  43.  
  44. (if (= #choice 1) 
  45. (
  46.     (rename "sys:classes/datatypes/sound.datatype" "sys:classes/datatypes/sound.datatype.bak")
  47. )
  48. )
  49.  
  50. (copyfiles
  51.     (source "datatypes/sound.datatype")
  52.     (dest @default-dest)
  53. )
  54.  
  55. ;--- move old descriptor files to storage, if found ---
  56. (if (exists "DEVS:DataTypes/8SVX")
  57. (
  58.     (message #found_8svx)
  59.     (rename "DEVS:DataTypes/8SVX" "SYS:Storage/DataTypes/8SVX")
  60.     (rename "DEVS:DataTypes/8SVX.info" "SYS:Storage/DataTypes/8SVX.info")
  61. )
  62. )
  63.  
  64. (if (exists "DEVS:DataTypes/16SV")
  65. (
  66.     (message #found_16sv)
  67.     (rename "DEVS:DataTypes/16SV" "SYS:Storage/DataTypes/16SV")
  68.     (rename "DEVS:DataTypes/16SV.info" "SYS:Storage/DataTypes/16SV.info")
  69. )
  70. )
  71.  
  72. ;--- install svx.datatype ---
  73. (copyfiles
  74.     (source "datatypes/svx.datatype")
  75.     (dest @default-dest)
  76. )
  77.  
  78. (if (not (exists "DEVS:DataTypes/SVX") )
  79. (
  80.     (copyfiles
  81.         (source "datatypes/SVX")
  82.         (dest "DEVS:DataTypes")
  83.     )
  84.  
  85.     (copyfiles
  86.         (source "datatypes/SVX.info")
  87.         (dest "DEVS:DataTypes")
  88.     )
  89. )
  90. )
  91.  
  92. ;--- install prefsed ---
  93. (set #dest
  94.     (askdir
  95.         (prompt #prefsdrwr)
  96.         (help @askdir-help)
  97.         (default "SYS:Prefs/Datatypes")
  98.     )
  99. )
  100.  
  101. (copyfiles
  102.     (source "prefs/")
  103.     (pattern "#?")
  104.     (dest #dest)
  105. )
  106.  
  107. (message #endmsg)
  108. ;--- eof ---
  109.